home *** CD-ROM | disk | FTP | other *** search
/ Asim CDFS 3.0 / Asim CDFS.adf / Install-AsimCDFS < prev    next >
Text File  |  1996-08-29  |  64KB  |  2,097 lines
  1. ;$VER: AsimCDFS Install 3.8 (29.8.96) 
  2. ;Copyright ©1993-1996 Asimware Innovations Inc.
  3.  
  4. (onerror (
  5.     (makeassign "AsimCDFSInst")
  6.     (makeassign "AsimCDFS")
  7.     (makeassign "AsimCDFS_Buffer")
  8. ))
  9.  
  10. (set #typeAMIGA 0)
  11. (set #typeCDTV 1)
  12. (set #typeCD32 2)
  13. (set #typeATAPI 3)
  14. (set #typeFLYER 4)
  15.  
  16. (set #autoMount 1)
  17. (set #CDDefault_NC "CD0" )
  18. (set #isPioneer 0)
  19. (set #isNakamichi 0)
  20. (set #isPDCD 0)
  21. (set #is4X4 0)
  22. (set #PioneerSeparate 0)
  23.  
  24. (set #wbversion (getversion "libs:version.library"))
  25. (set #wbversion (/ #wbversion 65536) )
  26.  
  27. (set #SCSIDevice "scsi.device")
  28. (set #SCSIUnit 4)
  29.  
  30. (set @default-dest "SYS:AsimCDFS")
  31. (set #echotxt "echo \"Mounting AsimCDFS...\"\n" )
  32.  
  33. (complete 0)
  34.  
  35.  
  36. ;*****
  37. ;  Please!  Use Novice!
  38. (if (> @user-level 0)
  39.     (message (cat "Installation notes\n"
  40.            "------------------\n\n"
  41.              "We have noticed problems with the Installer "
  42.              "program when using Expert or Intermediate mode.  The "
  43.              "general Novice install is recommended for most, if not "
  44.              "all situations.\n"
  45.     ))
  46. )
  47.  
  48.  
  49. ;*****
  50. ;  Need WB 2.0 or higher.
  51. (if (< #wbversion 37)
  52.     (abort "\n\nAmigaDOS 2.0 or higher is required for AsimCDFS 3.x. "
  53.              "\n\nAn upgrade will be needed for your Amiga."
  54.              "\n\nYou are currently running version " #wbversion ".")
  55. )
  56.  
  57.  
  58. ;*****
  59. ;  Lock our install disk
  60. (askdisk
  61.     (prompt "Please insert the disk labeled \"AsimCDFS_v3_Install\".")
  62.     (help    "AsimCDFS FileSystem and other utilities will be copied "
  63.             "from this disk into your system.")
  64.     (dest  "AsimCDFS_v3_Install")
  65.     (newname "AsimCDFSInst")
  66. )
  67.  
  68.  
  69.  
  70. ;*****
  71. ;  Need lots of space on sys volume for devs, l, etc.
  72. (set #installsize 0)
  73. (set #installsize (+ #installsize (getsize "AsimCDFSInst:l/AsimCDFS") ))
  74. (set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asimcdfs.devce") ))
  75. (set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asim_atapi.device") ))
  76. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimTunes") ))
  77. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DiscChanger") ))
  78. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimCDFS_Prefs") ))
  79. (set #installsize (+ #installsize (getsize "AsimCDFSInst:SimBoot") ))
  80. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PD_Format") ))
  81. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CD³²_Prefs") ))
  82. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CDTV_Prefs") ))
  83. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDFS_Prefs.info") ))
  84. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDTV_Prefs.info") ))
  85. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Track.info") ))
  86. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Disk.info") ))
  87. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Drawer.info") ))
  88. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Disk.info") ))
  89. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Drawer.info") ))
  90. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Sector.info") ))
  91. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Disk.info") ))
  92. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Track.info") ))
  93. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Disk.info") ))
  94. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCD³²_Prefs.info") ))
  95. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0") ))
  96. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0.info") ))
  97.  
  98. (if (< (getdiskspace "SYS:") #installsize)
  99.     (abort "\n\nApproximately " (/ #installsize 1024) "K of disk space is needed on your SYS: volume."
  100.              "\n\nYou only have " (/ (getdiskspace "SYS:") 1024)    "K free.\n\n"
  101.              "Delete or transfer some files from the SYS: volume and try again." )
  102. )
  103.  
  104.  
  105.  
  106.  
  107. (set #theirlevel @user-level )
  108. (user 2)
  109.  
  110. (complete 3)
  111. ;*****
  112. ;  Ask if CDTV (1) , CD³² (2) or Amiga (0)
  113. (set #IsAmiga
  114.     (askchoice
  115.         (prompt "\nAsimCDFS v3.6c Install\n--------------------\n\Please describe your setup:" )
  116.         (default 0 )
  117.         (choices "Amiga with SCSI CD-ROM" "CDTV/A570" "CD³²" "ATAPI CD-ROM on A4000/A1200" "NewTek Flyer with CD-ROM (unit #6) on SCSI-C" )
  118.         (help "\n\nIf AsimCDFS is being used in conjunction with a CDTV/A570 unit "
  119.                 "then note this with the CDTV/A570 selection.\n\n"
  120.                 "If AsimCDFS is being used with a CD³² unit, then note this with the CD³² selection.\n\n"
  121.                 "Otherwise, you will be installing AsimCDFS on an Amiga equipped "
  122.                 "with a SCSI or IDE controller and SCSI or ATAPI CD-ROM drive." )
  123.     )
  124. )
  125.  
  126.  
  127. (complete 6)
  128. ;*****
  129. ;  Is CDTV
  130. (if (= #IsAmiga #typeCDTV) 
  131.     ((set #CDDefault_NC "CD1" )
  132.     (set #SCSIDevice "cdtv.device")
  133.     (set #SCSIUnit 0)
  134.     )
  135. )
  136.  
  137. ;*****
  138. ;  Is CD³²
  139. (if (= #IsAmiga #typeCD32) 
  140.     ((set #CDDefault_NC "CD1" )
  141.     (set #SCSIDevice "cd.device")
  142.     (set #SCSIUnit 0)
  143.     )
  144. )
  145.  
  146. ;*****
  147. ;  Flyer
  148. (if (= #IsAmiga #typeFLYER) 
  149.     (set #CDDefault_NC "CD6" )
  150. )
  151.  
  152.  
  153. ;*****
  154. ;  If amiga, ask if using Pioneer or other
  155. (if (= #IsAmiga #typeAMIGA)
  156.     (set #isPioneer 
  157.         (askbool
  158.             (prompt "\n\n\nIs your CD-ROM drive a Pioneer DRM-60x?" )
  159.             (default 0)
  160.             (choices "Pioneer DRM-60x" "Other CD-ROM")
  161.             (help "\n\nIf you are using AsimCDFS with a Pioneer DRM-60x, indicate this "
  162.                     "in your choice.  This drive is a high-performance 6-disc minichanger and "
  163.                     "is not common."
  164.                     "\n\nOtherwise select Other CD-ROM." )
  165.         )
  166.     )
  167. )
  168.  
  169.  
  170. ;*****
  171. ;  If ispioneer==0, ask if using Nakamichi or other
  172. (if (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA))
  173.     (set #isNakamichi 
  174.         (askbool
  175.             (prompt "\n\n\nIs your CD-ROM drive a Nakamichi MBR-7,\n a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer?" )
  176.             (default 0)
  177.             (choices "MBR-7 / NEC 2xc, 4xc" "Other CD-ROM")
  178.             (help "\n\nIf you are using AsimCDFS with a Nakamichi MBR-7, a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer, indicate this "
  179.                     "in your choice.  This drive is a high-performance 7-disc minichanger and "
  180.                     "is not common."
  181.                     "\n\nOtherwise select Other CD-ROM." )
  182.         )
  183.     )
  184. )
  185.  
  186. ;*****
  187. ;  If ispioneer==0 & isnakamichi==0, ask if using PD/CD-ROM or other
  188. (if (and (= #isNakamichi 0) (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA)) )
  189.     (set #isPDCD 
  190.         (askbool
  191.             (prompt "\n\n\nIs your drive a Panasonic LF-1000 PD/CD-ROM drive?\n(combination read/write optical drive and CD-ROM drive)" )
  192.             (default 0)
  193.             (choices "LF-1000 PD/CD-ROM" "Other CD-ROM")
  194.             (help "\n\nIf you are using AsimCDFS with a Panasonic PD/CD-ROM drive, indicate this "
  195.                     "in your choice.  This drive is a combination read/write optical drive and CD-ROM drive.\n\n"
  196.                     "This drive is also bundled under 3rd party names such as Smart & Friendly and Toray.\n\n"
  197.                     "\n\nOtherwise select Other CD-ROM." )
  198.         )
  199.     )
  200. )
  201.  
  202.  
  203. (if (= #isPDCD 1)
  204.     (message (cat "Panasonic LF-1000 PD/CD-ROM users\n"
  205.                       "---------------------------------\n"
  206.         "Please ensure that your drive is set to the "
  207.         "\"Two LUN Mode\".  This is done via jumper switches "
  208.         "on the back of the drive.  Consult the manufacturer's "
  209.         "documentation for further information.\n\n"
  210.         "Also ensure that your SCSI controller is setup to "
  211.         "recognize LUNs."
  212.          )
  213.     )
  214. )
  215.  
  216.  
  217.  
  218. ;*****
  219. ;  If ispioneer==0 & isnakamichi==0, ask if using PD/CD-ROM or other
  220. (if (= #IsAmiga #typeATAPI) 
  221.     (set #is4X4 
  222.         (askbool
  223.             (prompt "\n\n\nIs your drive a NEC 4X4 4-disc ATAPI CD-ROM Changer?\n" )
  224.             (default 0)
  225.             (choices "NEC 4X4" "Other CD-ROM")
  226.             (help "\n\nIf you are using AsimCDFS with a NEC 4x4 ATAPI 4-disc CD-ROM Changer, indicate this "
  227.                     "in your choice.  This drive is a 1/2 height 5 1/2\" device.\n\n "
  228.                     "\n\nOtherwise select Other CD-ROM." )
  229.         )
  230.     )
  231. )
  232.  
  233. (complete 9)
  234. (if (or #is4X4 (or #isPioneer #isNakamichi))
  235.     (
  236.     ;*****
  237.     ;  ask if Pioneer/Nakamichi/NEC is separate or pooled
  238.     (set #PioneerSeparate
  239.             (askbool
  240.                 (prompt "\n\nDo you wish to have separate devices mounted, or would you like all discs pooled into 1 device?\n\n" )
  241.                 (default 0 )
  242.                 (choices "Separate" "Pooled")
  243.                 (help "\n\nIf you wish to have access to all discs simultaneously, then "
  244.                         "select Separate, otherwise select Pooled  --  in the latter case, "
  245.                         "you can switch between the discs with DiscChanger." )
  246.             )
  247.         )
  248.  
  249.  
  250.  
  251.     ;*****
  252.     ;  If pioneer separate, ask for base name
  253.     (if #PioneerSeparate
  254.         ((if